home *** CD-ROM | disk | FTP | other *** search
/ Latter-Day Clip Art / Latter-Day Clip Art.iso / browser.dxr / 00029_selectedPicture.ls < prev    next >
Encoding:
Text File  |  2001-11-12  |  727 b   |  28 lines
  1. on mouseUp me
  2.   global currentSprite
  3.   currentSprite = me.spriteNum
  4.   updateImage()
  5.   if the doubleClick then
  6.     member(9).text = "Loading Image"
  7.     updateStage()
  8.     createZoom()
  9.     sprite(19).member = 4
  10.     member(9).text = "Zoom"
  11.     go("zoom")
  12.   end if
  13. end
  14.  
  15. on rightMouseDown me
  16.   global GcurrentImage, currentDirectory, colorDirectory, format, currentSprite
  17.   currentSprite = me.spriteNum
  18.   updateImage()
  19.   updateStage()
  20.   temp = member(GcurrentImage, colorDirectory & " " & currentDirectory).image
  21.   newMember = new(#bitmap)
  22.   newMember.image = temp
  23.   copyToClipboard(newMember)
  24.   alert(GcurrentImage & " has been copied to the clipboard.")
  25.   member(12).text = "Copy to Clipboard"
  26.   sprite(24).member = "buttonUp"
  27. end
  28.